home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 3: Developer Tools / Linux Cubed Series 3 - Developer Tools.iso / devel / make / icmake-6.000 / icmake-6 / icmake / exec / funpushv.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-02-08  |  555 b   |  29 lines
  1. /*
  2. \funcref{fun\_push\_var}{void fun\_push\_var ()}
  3.     {}
  4.     {}
  5.     {push(), getint16(), getdest(), initvar()}
  6.     {}
  7.     {funpushv.c}
  8.     {
  9.  
  10.         This function is executed when an {\em op\_push\_var} opcode is read in
  11.         the binary makefile. Follwing the opcode a variable index is expected.
  12.         This variable is pushed onto the stack.
  13.  
  14.     }
  15. */
  16.  
  17. #include "icm-exec.h"
  18.  
  19. void fun_push_var ()
  20. {
  21.     register VAR_
  22.         *dest;
  23.  
  24.     dest = getdest ();
  25.     push (*dest);
  26.     if ( dest->type & (e_str | e_list) )
  27.         dest->vu.i->count++;
  28. }
  29.